object frmFont: TfrmFont Left = 258 Top = 222 AutoScroll = False BorderIcons = [biSystemMenu] Caption = 'Font Selection' ClientHeight = 180 ClientWidth = 483 Color = clBtnFace Constraints.MinHeight = 214 Constraints.MinWidth = 491 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate DesignSize = ( 483 180) PixelsPerInch = 96 TextHeight = 13 object bOK: TBitBtn Left = 289 Top = 144 Width = 83 Height = 25 Anchors = [akRight, akBottom] Caption = '&OK' Default = True ModalResult = 1 TabOrder = 1 Glyph.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 1800000000000003000000000000000000000000000000000000FF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066001EB2311FB13300 6600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FF00660047D36D3BCB5E25A83B0066001B A92E1DB132006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600 4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FF00660041C563006600FF00FFFF00FFFF 00FFFF00FF00660019AA2B006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066 00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF} end object bCancel: TBitBtn Left = 385 Top = 144 Width = 83 Height = 25 Anchors = [akRight, akBottom] Caption = '&Cancel' TabOrder = 2 Kind = bkCancel end object gbFilenameFont: TGroupBox Left = 0 Top = 0 Width = 483 Height = 129 Align = alTop Caption = 'This is the default font:' TabOrder = 0 DesignSize = ( 483 129) object eFontName: TLabeledEdit Left = 72 Top = 32 Width = 396 Height = 21 Hint = 'The name of the selected font.' TabStop = False Anchors = [akLeft, akTop, akRight] EditLabel.Width = 21 EditLabel.Height = 13 EditLabel.Caption = 'Font' LabelPosition = lpLeft LabelSpacing = 5 ParentShowHint = False ReadOnly = True ShowHint = True TabOrder = 0 end object eFontTest: TLabeledEdit Left = 72 Top = 56 Width = 396 Height = 21 TabStop = False Anchors = [akLeft, akTop, akRight] EditLabel.Width = 21 EditLabel.Height = 13 EditLabel.Caption = 'Test' LabelPosition = lpLeft LabelSpacing = 5 TabOrder = 1 end object bChangeFnameFont: TBitBtn Left = 72 Top = 88 Width = 97 Height = 25 Hint = 'Change the font' Anchors = [akLeft, akBottom] Caption = 'C&hange' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = bChangeFnameFontClick Glyph.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FF9C65319C65319C65319C65319C6531FF00FFFF00FFFF 00FFFF00FF9C65319C65319C65319C6531FF00FFFF00FFFF00FF9C6531FFFFFF FFFFFFFFFFFF9C6531FF00FFFF00FFFF00FFFF00FF9C6531FFFFFFFFFFFF9C65 31FF00FFFF00FFFF00FF9C6531FFFFFFFFFFFFFFFFFF9C6531FF00FFFF00FFFF 00FFFF00FF9C6531FFFFFFFFFFFF9C6531FF00FFFF00FFFF00FF9C6531FFFFFF FFFFFFFFFFFF9C6531FF00FFFF00FFFF00FFFF00FF9C6531FFFFFFFFFFFF9C65 319C65319C6531FF00FF9C6531FFFFFFFFFFFFFFFFFF9C6531FF00FFFF00FFFF 00FFFF00FF9C6531FFFFFFFFFFFFFFFFFFFFFFFF9C6531FF00FF9C6531FFFFFF FFFFFFFFFFFF9C65319C65319C65319C6531FF00FF9C6531FFFFFFFFFFFFFFFF FFFFFFFF9C6531FF00FF9C6531FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9C 6531FF00FF9C6531FFFFFFFFFFFF9C65319C65319C65319C65319C6531FFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9C6531FF00FF9C6531FFFFFFFFFFFFFFFF FFFFFFFFFFFFFF9C65319C6531FFFFFFFFFFFFFFFFFF9C65319C65319C65319C 6531FF00FF9C6531FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9C65319C6531FFFFFF FFFFFFFFFFFF9C65319C65319C65319C65319C65319C65319C65319C65319C65 319C65319C65319C65319C6531FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFF9C6531FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF9C6531FFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9C6531FF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FF9C65319C65319C65319C65319C65319C65319C65319C 65319C6531FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00 FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF} end object bResetFnameFont: TBitBtn Left = 184 Top = 88 Width = 97 Height = 25 Hint = 'Reset the font back to the standard' Anchors = [akLeft, akBottom] Caption = '&Reset' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = bResetFnameFontClick Glyph.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 18000000000000030000120B0000120B00000000000000000000FF00FF9C6500 9C65009C65009C65009C65009C65009C65009C6500FF00FFFF00FF9C65009C65 009C65009C65009C65009C65009C65009C65009C65009C65009C65009C65009C 65009C6500FF00FFFF00FF9C65009C65009C65009C6500FF00FF9C65009C6500 FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF9C65009C65 009C65009C6500FF00FF9C65009C6500FF00FFFF00FF9C65319C65319C65319C 6531FF00FFFF00FFFF00FF9C65009C65009C65009C6500FF00FF9C65009C6500 FF00FFFF00FF9C6531FFFFFFFFFFFF9C6531FF00FFFF00FFFF00FF9C6500FF00 FF9C65009C6500FF00FF9C65009C6500FF00FFFF00FF9C6531FFFFFFFFFFFF9C 6531FF00FFFF00FFFF00FFFF00FFFF00FF9C65009C6500FF00FF9C65009C6500 FF00FFFF00FF9C6531FFFFFFFFFFFF9C65319C65319C6531FF00FFFF00FFFF00 FF9C65009C6500FF00FF9C65009C6500FF00FFFF00FF9C6531FFFFFFFFFFFFFF FFFFFFFFFF9C6531FF00FFFF00FFFF00FF9C65009C6500FF00FF9C65009C6500 FF00FFFF00FF9C6531FFFFFFFFFFFFFFFFFFFFFFFF9C6531FF00FFFF00FFFF00 FF9C65009C6500FF00FF9C65009C6500FF00FFFF00FF9C6531FFFFFFFFFFFF9C 65319C65319C65319C6531FF00FFFF00FF9C65009C6500FF00FF9C65009C6500 FF00FFFF00FF9C6531FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9C6531FF00FFFF00 FF9C65009C6500FF00FF9C65009C6500FF00FFFF00FF9C6531FFFFFFFFFFFFFF FFFFFFFFFFFFFFFF9C6531FF00FFFF00FF9C65009C6500FF00FF9C65009C6500 FF00FFFF00FF9C65319C65319C65319C65319C65319C65319C6531FF00FFFF00 FF9C65009C6500FF00FF9C65009C6500FF00FFFF00FFFF00FFFF00FFFF00FFFF 00FFFF00FFFF00FFFF00FFFF00FFFF00FF9C65009C6500FF00FF9C65009C6500 9C65009C65009C65009C65009C65009C65009C65009C65009C65009C65009C65 009C65009C6500FF00FFFF00FF9C65009C65009C65009C65009C65009C65009C 65009C65009C65009C65009C65009C65009C6500FF00FFFF00FF} end end object FNameFontDialog: TFontDialog Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Options = [fdAnsiOnly, fdForceFontExist, fdLimitSize] Left = 296 Top = 88 end end